home *** CD-ROM | disk | FTP | other *** search
- // Copyright (C) 1997-2002 Alias|Wavefront,
- // a division of Silicon Graphics Limited.
- //
- // The information in this file is provided for the exclusive use of the
- // licensees of Alias|Wavefront. Such users have the right to use, modify,
- // and incorporate this code into other products for purposes authorized
- // by the Alias|Wavefront license agreement, without fee.
- //
- // ALIAS|WAVEFRONT DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
- // INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
- // EVENT SHALL ALIAS|WAVEFRONT BE LIABLE FOR ANY SPECIAL, INDIRECT OR
- // CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE,
- // DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER
- // TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
- // PERFORMANCE OF THIS SOFTWARE.
- //
-
- //
- // Alias|Wavefront Script File
- // MODIFY THIS AT YOUR OWN RISK
- //
- // Creation Date: May, 1997
- // Author: Carol Levy
- //
- // Description:
- // dynExecuteGoalCommand executes the goal command
- //
- // Input Arguments():
- // string $goalCmd -- the goal command string (except for the selection)
- //
- // Return Value:
- // None.
- //
- //
- // ============== dynExecuteGoalCommand ==============
- //
- // SYNOPSIS
- // Execute the goal command.
- // The last item in the selection list is the goal, and all
- // other items are attracted to it.
- //
- global proc dynExecuteGoalCommand(string $goalCmd)
- {
- string $fullCmd;
- int $numParticleObjs;
- int $i;
-
- string $selected[] = `ls -sl`;
-
- $numParticleObjs = size($selected) - 1;
-
- $fullCmd = $goalCmd + " -g " +$selected[$numParticleObjs] + " ";
-
- for ($i = 0; $i < $numParticleObjs; $i++)
- $fullCmd = $fullCmd + " " + $selected[$i];
-
- evalEcho($fullCmd);
- }
-
-